home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 12 / Cream of the Crop 12 (Part II) / Cream of the Crop 12 (Part II).iso / OS2 / MAG9DEMO.ZIP / EXT_DIR.ZIP / MAKEDOOR.BBS < prev    next >
Encoding:
File List  |  1996-04-01  |  5.0 KB  |  124 lines
  1. @c12   --------------------  Sample creation of "DOOR.SYS" equivalent -----
  2. @z0="e:\gs\com\door.sys";     **** Use your applicable pathname here!
  3. @e6                    ---- NOTE: @E4, @E5 and @E6 require v7.00 or greater!
  4. @!0 @z99=z0; @e5
  5. @z0=v0; @n0=7; @n0=(n0|128); @z1=o19; @b0(z1!="L"); @z0="COM0:"; @p0 @z0("");     write comhandle
  6. @z0=u48; @z0("");                         write bps rate
  7. @z0="8"; @z0("");                      ** write parity ???
  8. @z0=o12; @z0("");                         write node#
  9. @z0="19200"; @z0("");                  ** write DTE rate ???
  10. @z0="N"; @z0("");                         write display (Y=on, N=off)
  11. @z0="N"; @z0("");                         write printer (Y=on, N=off)
  12. @z0="N"; @z0("");                         write pagebell (Y=on, N=off)
  13. @z0="N"; @z0("");                         write caller alarm (Y=on, N=off)
  14. @z0=u3; @z1=u4; @z2=u2; @z0=(z0+" "); @z0=(z0+z1); @z0=(z0+" "); @z0=(z0+z2); @z0(""); write full user name
  15. @z0=u8; @z0=(z0+"/"); @z1=u9; @z0=(z0+z1); @z0(""); write city/state
  16. @z0=u17; @z0("");                         write home phone
  17. @z0=""; @z0("");                       ** write data phone ???
  18. @z0=u12; @z0("");                         write password
  19. @z0=u35; @z0("");                         write security level
  20. @z0=u40; @z0("");                         write total times on
  21. @z0=u14; @z0("");                         write last date called
  22. @z0=u41; @n0=z0; @n0=(n0*60); @z0=n0; @z0("");  write seconds remaining this call
  23. @z0=u41; @z0("");                         write minutes remaining this call
  24. @z0="GR"; @z1=u29; @b1(z1="B/W"); @b2; @p1 @z0="NG"; @p2 @z0(""); write color
  25. @z0=u34; @z0("");                         write page length
  26. @z0="Y"; @z1=u27; b10(z1="Novice"); @b20; @p10 @z0="N"; @p20 @z0(""); write expert
  27. @z0=u21; @z0("");                         write user conferences
  28. @z0=""; @z0("");                          write conf in
  29. @z0=u22; @z0("");                      ** write expiration date ???
  30. @z0=u1; @z0("");                       ** write user file record# (0=1st, 1=2nd)???
  31. @z0=""; @z0("");                       ** write user xfer protocol???
  32. @z0=u36; @z0("");                         write total uploads
  33. @z0=u37; @z0("");                         write total downloads
  34. @z0="0"; @z0("");                         write daily k-bytes downloaded
  35. @z0="1000"; @z0("");                   ** write daily maximum k-bytes to download???
  36. @z0=u16; @z0("");                         write callers birthdate
  37. @z0=""; @z0("");                          write path to user file
  38. @z0=""; @z0("");                          write path to gen directory
  39. @z0="Chuck B Gilmore"; @z0("");        ** write sysop's name ???
  40. @z0="/0"; @z0("");                        write sysop's alias
  41. @z0=""; @z0("");                          write event time
  42. @z0=""; @z0("");                          write error-correcting modem
  43. @z0=""; @z0("");                       ** write ANSI supported by user but not used???
  44. @z0="Y"; @z0("");                      ** write use file locking???
  45. @z0="2"; @z0("");                      ** write default color???
  46. @z0="0"; @z0("");                      ** write time credits in minutes???
  47. @z0=""; @z0("");                          write last new files scan date
  48. @z0=""; @z0("");                          write time of this call
  49. @z0=u15; @z0("");                         write time of last call
  50. @z0=""; @z0("");                          write maximum daily files available
  51. @z0=""; @z0("");                          write files downloaded today
  52. @z0=u44; @z0("");                         write k-bytes uploaded
  53. @z0=u45; @z0("");                         write k-bytes downloaded
  54. @z0=u24; @z0("");                         write comment on user
  55. @z0=""; @z0("");                          write doors opened
  56. @z0=""; @z0("");                          write messages left by user
  57. @b99;
  58. //////////////////////////////////////////////////////////////////////////////
  59. //                                                                          //
  60. // NOTES:                                                                   //
  61. //                                                                          //
  62. //   - Filename written to is in MILC variable @Z99                         //
  63. //                                                                          //
  64. //   - Example of calling an OS/2 version of "TradeWars":                   //
  65. //      @z0="tradewar.exe"; @z1="/P:"; @z1=(z1+z99); @e0                    //
  66. //                                                                          //
  67. //   - Lines above marked with ** should be tailored to YOUR BBS!!!         //
  68. //                                                                          //
  69. //////////////////////////////////////////////////////////////////////////////
  70. @p99
  71. @c13
  72. COM0:
  73. 19200
  74. 8
  75. 17
  76. 19200
  77. N
  78. N
  79. N
  80. N
  81. Chuck B Gilmore
  82. Thousand Oaks/CA
  83. (818) 782-6290
  84.  
  85. MyPassWord
  86. 1000
  87. 23
  88. 05/07/1993
  89. 7140
  90. 119
  91. GR
  92. 23
  93. Y
  94. ACHKLWZ
  95.  
  96.  
  97. 0
  98.  
  99. 0
  100. 0
  101. 0
  102. 1000
  103. 08/07/1955
  104.  
  105.  
  106. Chuck B Gilmore
  107. /0
  108.  
  109.  
  110.  
  111. Y
  112. 2
  113. 0
  114.  
  115.  
  116. 23:26
  117.  
  118.  
  119. 0
  120. 0
  121. Master SYSOP
  122.  
  123.  
  124.